home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Magazin: Amiga-CD 1996 May & June
/
Amiga-CD 1996 #5-6.iso
/
makeassign
< prev
next >
Wrap
Text File
|
1996-03-25
|
3KB
|
89 lines
;
; $VER: MakeAssign 1.0 © MagnaMedia (22-08-95)
;
; Erstellt von: René Beaupoil
; Angepaßt von: David Göhler 6. November 1996 1.0
; Hartwig Tauber 16. Januar 1996 (für 2/96-CD)
; René Beaupoil 23. März 1996 (für 5/96-CD)
;
; erzeugt alle nötigen Assigns für die Installations-
; routinen der Programme
; damit dieses Skript nicht unkontrolliert abbricht
Failat 21
; etwas für die Geschwindigkeit tun
Resident >NIL: C:Assign
; testen, ob zu installieren oder zurückzunehmen ist
Assign DIRS >t:AllAssigns
Search >NIL: t:AllAssigns AMIGA_1996_5
; falls AMIGA_1996_5 nicht gefunden wurde: installieren
If WARN
echo "Installiere alle nötigen Assigns " NOLINE
cd AMIGA_1996_5:
Assign >NIL: SSA-Org: :Grafik/Animationen/ ADD
setenv request NO
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: MABroadcast: :Tools/MVB_PD ADD
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: TWIST: :AMIGA-Magazin/Jahresinhalt_89_bis_96
Assign >NIL: TWISTICON: TWIST:ICONS
echo "*e[43m·*e[40m" NOLINE
; wegen der AmigaGuide-Library
Assign >NIL: LIBS: :libs ADD
echo "*e[43m·*e[40m" NOLINE
;BEGIN MUI
if exists ":PD-Software/MUI_3.3"
assign MUI: ":PD-Software/MUI_3.3"
echo "*e[43m·*e[40m" NOLINE
if exists MUI:Libs
assign add LIBS: MUI:Libs
echo "*e[43m·*e[40m" NOLINE
endif
if exists MUI:Locale
assign add LOCALE: MUI:Locale
echo "*e[43m·*e[40m" NOLINE
endif
version >nil: exec.library 39
if not warn
if exists MUI:Docs
if exists HELP:dummy ; do not remove
endif ; this entry!
assign add HELP: MUI:Docs
echo "*e[43m·*e[40m" NOLINE
endif
endif
endif
;END MUI
Else
; sonst alle Assigns wieder zurücknehmen
echo "Nehme alle benötigten Assigns zurück " NOLINE
cd AMIGA_1996_5:
Assign >NIL: SSA-Org: REMOVE
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: MABroadcast: REMOVE
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: TWISTICON: REMOVE
Assign >NIL: TWIST: REMOVE
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: LIBS: :libs REMOVE
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: HELP: MUI:Docs REMOVE
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: LOCALE: MUI:Locale REMOVE
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: LIBS: MUI:Libs REMOVE
echo "*e[43m·*e[40m" NOLINE
Assign >NIL: MUI: REMOVE
echo "*e[43m·*e[40m" NOLINE
Endif
Echo " OK!"
; und wieder aufräumen
Delete >NIL: t:AllAssigns
Resident >NIL: C:Assign REMOVE